home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / cocktail / reuse.lha / reuse / src / Memory.md < prev    next >
Text File  |  1992-08-18  |  945b  |  39 lines
  1. (* $Id: Memory.md,v 1.2 1992/08/07 14:45:41 grosch rel $ *)
  2.  
  3. (* $Log: Memory.md,v $
  4.  * Revision 1.2  1992/08/07  14:45:41  grosch
  5.  * added comments
  6.  *
  7.  * Revision 1.1  1991/11/21  14:33:17  grosch
  8.  * new version of RCS on SPARC
  9.  *
  10.  * Revision 1.0  88/10/04  11:47:10  grosch
  11.  * Initial revision
  12.  * 
  13.  *)
  14.  
  15. (* Ich, Doktor Josef Grosch, Informatiker, Juli 1986 *)
  16.  
  17. DEFINITION MODULE Memory;
  18.  
  19. FROM SYSTEM IMPORT ADDRESS;
  20.  
  21. VAR      MemoryUsed    : LONGCARD;
  22.             (* Holds the total amount of memory managed by    *)
  23.             (* this module.                    *)
  24.  
  25. PROCEDURE Alloc        (ByteCount: LONGINT) : ADDRESS;
  26.             (* Returns a pointer to dynamically allocated    *)
  27.             (* space of size 'ByteCount' bytes.        *)
  28.             (* Returns NIL if space is exhausted.           *)
  29.  
  30.  
  31. PROCEDURE Free        (ByteCount: LONGINT; a: ADDRESS);
  32.             (* The dynamically allocated space starting at    *)
  33.             (* address 'a' of size 'ByteCount' bytes is    *)
  34.             (* released.                    *)
  35.  
  36. (* PROCEDURE WriteMemory; *)
  37.  
  38. END Memory.
  39.